From: Tino Calancha <tino.calancha@gmail.com>
Date: Tue, 20 Dec 2016 10:22:15 +0000 (+0900)
Subject: files-test-read-file-in-: Delete temporary dir on exit
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~21^2~2069
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=15817f4e3ae027e6ed573a1814bd4cf1d59e4d64;p=emacs.git

files-test-read-file-in-: Delete temporary dir on exit

* test/lisp/files-tests.el (files-test-read-file-in-~):
Create subdir inside dir.
---

diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el
index f4ccd5c2044..6fbe993bfdd 100644
--- a/test/lisp/files-tests.el
+++ b/test/lisp/files-tests.el
@@ -229,7 +229,7 @@ be $HOME."
                (or def init)))
             (dir (make-temp-file "read-file-name-test" t)))
     (unwind-protect
-        (let ((subdir (expand-file-name "./~/")))
+        (let ((subdir (expand-file-name "./~/" dir)))
           (make-directory subdir t)
           (with-temp-buffer
             (setq default-directory subdir)